powered by
pen.value(object)<-value
object
pen.value<--methods
x=new("cpt") # new cpt object pen.value(x)<-5 # replaces the existing pen.value slot in x with 5
Run the code above in your browser using DataLab